home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness:…ecision-Making Strategies / Workplace Effectiveness: Decision-Making Strategies.iso / pc / Files / Review.dxr / 00029_from Skilluse.ls < prev    next >
Encoding:
Text File  |  1998-12-16  |  594 b   |  36 lines

  1. global gMasterData, gSection, gReviewData, gEvaluationData
  2.  
  3. on goAnswers
  4.   stopSound2()
  5.   go("a1")
  6.   goNarrator(gMasterData, "100")
  7.   set gSection to #answers
  8.   set the spin of gReviewData to 1
  9. end
  10.  
  11. on goPlan1
  12.   stopSound2()
  13.   go("plan1")
  14.   audio1xOnly(gMasterData, "99")
  15.   set gSection to #plan1
  16. end
  17.  
  18. on goPlan2
  19.   go("plan2")
  20.   set gSection to #plan2
  21. end
  22.  
  23. on goVideo
  24.   stopSound2()
  25.   set gSection to #video
  26.   go("video")
  27. end
  28.  
  29. on goEvaluate
  30.   if voidp(gEvaluationData) then
  31.     set gEvaluationData to [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  32.   end if
  33.   go("eval1")
  34.   set gSection to #evaluate1
  35. end
  36.